    

using Progress.Lang.*.

routine-level on error undo, throw.

class OpenEdge.WebSpeed.WebContext:
    
        
    define public property current-environment as character
        get():
            return web-context:current-environment.
        end.
        
        private set.
        
    define public property html-charset as character
        get():
        
            return web-context:html-charset.
        end.
        private set.

    define public property session-end as logical
        get ():
            return web-context:session-end.
        end.
        set (input session-end as logical):
            web-context:session-end = session-end.
        end.
    
    define public property utc-offset as integer
        get():
            return web-context:utc-offset.
        end.
        set(input utc-offset as integer):
            web-context:utc-offset = utc-offset.
        end.
    
    method public character get-cgi-list(input cgiVar as character):
        return web-context:get-cgi-list(cgiVar).
    end.
	
    method public character get-cgi-list ():
        return web-context:get-cgi-list("ENV":U).
    end.

    method public character	get-cgi-value(input cgiVar as character):
        return web-context:get-cgi-value("ENV":U, cgiVar).
    end.
    
    method public character get-cgi-value(p_list as character, p_name as character, p_delim as character):
        return web-context:get-cgi-value(p_list, p_name, p_delim).
    end.
    
    method public memptr get-binary-data(p_name as character):
        return web-context:get-binary-data(p_name).
    end.

    method public longchar get-cgi-long-value(p_name as character):
        return GET-CGI-LONG-VALUE("ENV":U, p_name).
    end.
    
    method public longchar get-cgi-long-value(p_list as character, p_name as character):
        return GET-CGI-LONG-VALUE(p_list, p_name).
    end.
    
    method public longchar get-cgi-long-value(p_list as character, p_name as character, p_delim as character):
        return web-context:get-cgi-long-value("FORM":U, p_name, p_delim).
    end.
    
    method public character get-config-value(p_name as character):
        return web-context:get-config-value(p_name).
    end.
    
    method public character url-decode(p_in as character):
        return web-context:url-decode(p_in).    
    end.

end class.